DiskSound was adapted from an init called “MacPuke”, which I got from a friend.
Unfortunately, MacPuke wouldn't work together with AppleShare. If you dragged
an AppleShare disk into the trash, it would just pop out again (after producing
a Bleah! sound). I think this was due to not all registers being saved.
After creating my own Version of MacPuke, I got the idea of also writing a ‘disk insert’ Sound. This was not that difficult, I already had all the pieces.
This is the result, one INIT for both sounds, written using MPW Pascal and MPW Assembler.
To customize it, just copy some other sounds in there, and name them ‘InsertSound’ and ‘EjectSound’ and delete the old sounds with these names. Note that there are no spaces in the names of the resources (the old MacPuke had a resource ‘Eject Sound’). This version already comes with 2 sounds.
“DiskSound” loads the trap patches and sounds into the system heap. I remember reading somewhere that that was now the preferred way of doing things instead of loading below BufTop. Unfortunately, I couldn't track down that reference, although I think it came from Apple.
Note -- I ran this thing on a Mac II with Multifinder and on a Mac SE w/o Multifinder. Although I think this will run on any Mac with the 128KRoms or better, I can't really guarantee it will always work. Also, if you don't have lots of memory, paste some *small* sounds into it.